﻿Imports System.Xml
Imports System.Text
Imports System.IO
Imports Mysoft.Map.Workflow.Utility
Imports Mysoft.Map.Workflow.Public
Imports Mysoft.Map.Workflow

Partial Public Class ProcessHandleInfo
    Inherits System.Web.UI.Page

    Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
        If Not IsPostBack Then
            If Not Request.QueryString("BusinessGUID") Is Nothing Then
                Dim BusinessGUID As String = Request.QueryString("BusinessGUID")
                Dim BusinessType As String = Request.QueryString("BusinessType")

                Dim ProcessGUID As String = [Public].WorkflowPublic.GetProcessEntityGUID(BusinessGUID, BusinessType)

                '重定向
                Dim strURL As String = Request.Url.ToString()
                Response.Redirect("/MyWorkflow/WF_ProcessHandle_Process.aspx?enabledSave=false&nodeguid=&processGUID=" + ProcessGUID)
                Response.End()
            End If
        End If
    End Sub

End Class